﻿Public Class Puesto

    Dim m_codigo As Integer
    Dim m_nombre As String
    Dim m_descripcion As String
    Dim m_nivel As Integer
    Dim m_tipoSalario As Integer
    Dim m_salario As Double

    Public Sub New(ByVal p_codigo As Integer, ByVal p_nombre As String, ByVal p_descripcion As String, _
            ByVal p_nivel As Integer, ByVal p_tipoSalario As Integer, ByVal p_salario As Double)
        Codigo = p_codigo
        Nombre = p_nombre
        Descripcion = p_descripcion
        Nivel = p_nivel
        TipoSalario = p_tipoSalario
        Salario = p_salario
    End Sub


    Public Sub New(ByVal p_codigo As Integer, ByVal p_nombre As String, ByVal p_descripcion As String, _
                       ByVal p_tipoSalario As Integer, ByVal p_salario As Double)
        Codigo = p_codigo
        Nombre = p_nombre
        Descripcion = p_descripcion
        TipoSalario = p_tipoSalario
        Salario = p_salario
    End Sub

    Public Property Codigo() As Integer
        Get
            Return m_codigo
        End Get
        Set(ByVal p_codigo As Integer)
            m_codigo = p_codigo
        End Set
    End Property

    Public Property Nombre() As String
        Get
            Return m_nombre
        End Get
        Set(ByVal p_nombre As String)
            m_nombre = p_nombre
        End Set
    End Property

    Public Property Descripcion() As String
        Get
            Return m_descripcion
        End Get
        Set(ByVal p_descipcion As String)
            m_descripcion = p_descipcion
        End Set
    End Property

    Public Property Nivel() As Integer
        Get
            Return m_nivel
        End Get
        Set(ByVal p_nivel As Integer)
            m_nivel = p_nivel
        End Set
    End Property

    Public Property TipoSalario() As Integer
        Get
            Return m_tipoSalario
        End Get
        Set(ByVal p_tipoSalario As Integer)
            m_tipoSalario = p_tipoSalario
        End Set
    End Property

    Public Property Salario() As Integer
        Get
            Return m_salario
        End Get
        Set(ByVal p_salario As Integer)
            m_salario = p_salario
        End Set
    End Property

End Class
